home *** CD-ROM | disk | FTP | other *** search
/ Informática Multimedia 1995 April / Informatica Multimedia CD - Epimundo.iso / DOS / CAT_DISK / VLITE.ZIP / CLIPVIS.C < prev    next >
Encoding:
C/C++ Source or Header  |  1992-04-09  |  6.1 KB  |  367 lines
  1. /*****************************************************************************
  2. *   Copyright (c) DIDC, 1991.  All rights reserved.                          *
  3. *   Unauthorized use, duplication, or distribution is strictly prohibited.   *
  4. *****************************************************************************/
  5. #include "mscvis.h"
  6. #include "extend.h"
  7.  
  8. /*************************************************************/
  9. /* Clipper Calls */
  10. /*************************************************************/
  11.  
  12. CLIPPER LOCATETSR(void)
  13. {
  14. int res;
  15. res = DIDC_locate_tsr();
  16. _retni(res);
  17. }
  18.  
  19. /*************************************************************/
  20.  
  21. CLIPPER CNT_P_TYPE(void)
  22. {
  23. /* 002 */
  24. char far *db;
  25. char far *key;
  26. int doctype;
  27. int res;
  28.  
  29. db = _parc(1);
  30. key = _parc(2);
  31. doctype = _parni(3);
  32.  
  33. res = DIDC_total_pages_type(db,key,doctype);
  34. _retni(res);
  35. }
  36.  
  37. /*************************************************************/
  38.  
  39. CLIPPER CALLMENU(void)
  40. {
  41. /* 003 */
  42. char far *db;
  43. char far *key;
  44. char far *docfname;
  45. int flag;
  46. int res;
  47.  
  48. db = _parc(1);
  49. key = _parc(2);
  50. flag = _parni(3);
  51. docfname = _parc(4);
  52.  
  53. res = DIDC_call_menu(db,key,flag,docfname);
  54. _retni(res);
  55. }
  56.  
  57. /***********************************************************/
  58.  
  59. CLIPPER TSRTYPE(void)
  60. {
  61. /* 004 */
  62. int res;
  63. res = DIDC_tsr_type();
  64. _retni(res);
  65. }
  66.  
  67. /*************************************************************/
  68.  
  69. CLIPPER BATCHUP(void)
  70. {
  71. /* 005 */
  72. int res;
  73.  
  74. res = DIDC_batch_update();
  75. _retni(res);
  76. }
  77.  
  78. /*************************************************************/
  79.  
  80. CLIPPER SETWVOL(void)
  81. {
  82. /* 006 */
  83. int vol,res;
  84.  
  85. vol = _parni(1);
  86. res = DIDC_set_write_vol(vol);
  87. _retni(res);
  88. }
  89.  
  90. /***********************************************************/
  91.  
  92. CLIPPER CLRPGE(void)
  93. {
  94. /* 007 */
  95. int res;
  96. res = DIDC_clear_doc_page();
  97. _retni(res);
  98. }
  99.  
  100. /*************************************************************/
  101.  
  102. CLIPPER UKEY(void)
  103. {
  104. /* 008 */
  105. char far *db;
  106. static char key[30];
  107. int res,len;
  108.  
  109. db = _parc(1);
  110. len = _parni(2);
  111. res = DIDC_unique_key(db, key, len);
  112. _retc(key);
  113. }
  114.  
  115. /***********************************************************/
  116.  
  117. CLIPPER GETWVOL(void)
  118. {
  119. /* 010 */
  120. int res;
  121. res = DIDC_get_write_vol();
  122. _retni(res);
  123. }
  124.  
  125. /***********************************************************/
  126.  
  127. CLIPPER SHOWLUNS(void)
  128. {
  129. /* 011 */
  130. int res;
  131. res = DIDC_show_luns();
  132. _retni(res);
  133. }
  134.  
  135. /***********************************************************/
  136.  
  137. CLIPPER SCNPGE(void)
  138. {
  139. /* 101 */
  140. char far *db;
  141. char far *key;
  142. int page_type;
  143. int res;
  144.  
  145. db = _parc(1);
  146. key = _parc(2);
  147. page_type = _parni(3);
  148.  
  149. res = DIDC_scan_page(db, key, page_type);
  150. _retni(res);
  151. }
  152.  
  153. /***********************************************************/
  154.  
  155. CLIPPER AUTOSCAN(void)
  156. {
  157. /* 102 */
  158. char far *db;
  159. char far *key;
  160. int page_type;
  161. int res;
  162.  
  163. db = _parc(1);
  164. key = _parc(2);
  165. page_type = _parni(3);
  166.  
  167. res = DIDC_auto_scan(db, key, page_type);
  168. _retni(res);
  169. }
  170.  
  171. /***********************************************************/
  172.  
  173. CLIPPER SETSCAN(void)
  174. {
  175. /* 103 */
  176. int page_len;
  177. int source;
  178. int intensity;
  179. int res;
  180.  
  181. page_len = _parni(1);
  182. source = _parni(2);
  183. intensity = _parni(3);
  184.  
  185. res = DIDC_set_scanner(page_len,source,intensity);
  186. _retni(res);
  187. }
  188.  
  189. /***********************************************************/
  190.  
  191. CLIPPER INSPGE(void)
  192. {
  193. /* 104 */
  194. char far *db;
  195. char far *key;
  196. int page_type;
  197. int page_num;
  198. int res;
  199.  
  200. db = _parc(1);
  201. key = _parc(2);
  202. page_type = _parni(3);
  203. page_num = _parni(4);
  204.  
  205. res = DIDC_insert_page(db, key, page_type, page_num);
  206. _retni(res);
  207. }
  208.  
  209. /***********************************************************/
  210.  
  211. CLIPPER DELPGE(void)
  212. {
  213. /* 105 */
  214. char far *db;
  215. char far *key;
  216. int page_type;
  217. int page_num;
  218. int res;
  219.  
  220. db = _parc(1);
  221. key = _parc(2);
  222. page_type = _parni(3);
  223. page_num = _parni(4);
  224.  
  225. res = DIDC_delete_page(db, key, page_type, page_num);
  226. _retni(res);
  227. }
  228.  
  229. /***********************************************************/
  230.  
  231. CLIPPER GETSCAN(void)
  232. {
  233. /* 106 */
  234. int param;
  235. int res;
  236.  
  237. param = _parni(1);
  238. res = DIDC_get_scanner(param);
  239. _retni(res);
  240. }
  241.  
  242. /***********************************************************/
  243.  
  244. CLIPPER SAVESCAN(void)
  245. {
  246. /* 107 */
  247. int res;
  248. res = DIDC_save_scan_set();
  249. _retni(res);
  250. }
  251.  
  252. /***********************************************************/
  253.  
  254. CLIPPER PRTALL(void)
  255. {
  256. char far *db;
  257. char far *key;
  258. int doctype;
  259. int res;
  260.  
  261. db = _parc(1);
  262. key = _parc(2);
  263. doctype = _parni(3);
  264.  
  265. res = DIDC_print_pages(db,key,doctype,0,0);
  266. _retni(res);
  267. }
  268.  
  269. /***********************************************************/
  270.  
  271. CLIPPER PRTPGES(void)
  272. {
  273. char far *db;
  274. char far *key;
  275. int doctype;
  276. int first_page;
  277. int last_page;
  278. int res;
  279.  
  280. db = _parc(1);
  281. key = _parc(2);
  282. doctype = _parni(3);
  283. first_page = _parni(4);
  284. last_page  = _parni(5);
  285.  
  286. res = DIDC_print_pages(db,key,doctype,first_page,last_page);
  287.  
  288. _retni(res);
  289. }
  290.  
  291. /***********************************************************/
  292.  
  293. CLIPPER DISPPAGE(void)
  294. {
  295. char far *db;
  296. char far *key;
  297. int doctype;
  298. int page;
  299. int control;
  300. int res;
  301.  
  302. db = _parc(1);
  303. key = _parc(2);
  304. doctype = _parni(3);
  305. page = _parni(4);
  306. control = _parni(5);
  307.  
  308. res = DIDC_display_page(db,key,doctype,page,control);
  309. _retni(res);
  310. }
  311.  
  312. /***********************************************************/
  313.  
  314. CLIPPER OCR_PAGE(void)
  315. {
  316. char far *db;
  317. char far *key;
  318. char far *textfname;
  319. int doctype,page,append_flag;
  320. int res;
  321.  
  322. db = _parc(1);
  323. key = _parc(2);
  324. doctype = _parni(3);
  325. page = _parni(4);
  326. textfname = _parc(5);
  327. append_flag = _parni(6);
  328.  
  329. res = DIDC_ocr_page(db,key,doctype,page,textfname,append_flag);
  330. _retni(res);
  331. }
  332.  
  333. /***********************************************************/
  334.  
  335. CLIPPER PRT_STAT(void)
  336. {
  337. int res;
  338. res = DIDC_printer_status();
  339. _retni(res);
  340. }
  341.  
  342. /***********************************************************/
  343.  
  344. CLIPPER EXTIMG(void)
  345. {
  346. char far *db;
  347. char far *key;
  348. int doctype;
  349. int page;
  350. char far *fname;
  351. int res;
  352.  
  353. db = _parc(1);
  354. key = _parc(2);
  355. doctype = _parni(3);
  356. page = _parni(4);
  357. fname = _parc(5);
  358.  
  359. res = DIDC_extract_image(db,key,doctype,page,fname);
  360.  
  361. _retni(res);
  362. }
  363.  
  364. /***********************************************************/
  365.  
  366.  
  367.